inherited FormCadIndustriaMarca: TFormCadIndustriaMarca
  Caption = 'Cadastro de ind'#250'strias e marcas'
  ClientHeight = 172
  ClientWidth = 459
  ExplicitWidth = 465
  ExplicitHeight = 200
  PixelsPerInch = 96
  TextHeight = 13
  inherited pgcMestre: TPageControl
    Width = 459
    Height = 172
    inherited pagPrincipal: TTabSheet
      ExplicitLeft = 4
      ExplicitTop = 24
      ExplicitWidth = 586
      ExplicitHeight = 344
      object lblId: TLabel [0]
        Left = 15
        Top = 60
        Width = 10
        Height = 13
        Caption = 'Id'
      end
      object lblDescricao: TLabel [1]
        Left = 75
        Top = 60
        Width = 46
        Height = 13
        Caption = 'Descri'#231#227'o'
      end
      inherited pnlBotoes: TPanel
        Width = 451
      end
      object edtId: TDBEdit
        Left = 15
        Top = 75
        Width = 50
        Height = 21
        DataField = 'ID'
        DataSource = dtsMestre
        Enabled = False
        TabOrder = 1
      end
      object edtDescricao: TDBEdit
        Left = 75
        Top = 75
        Width = 360
        Height = 21
        DataField = 'Descricao'
        DataSource = dtsMestre
        TabOrder = 2
      end
    end
  end
  inherited actAcoes: TActionList
    inherited actPesquisar: TAction
      OnExecute = actPesquisarExecute
    end
  end
  inherited cdsMestre: TClientDataSet
    Params = <
      item
        DataType = ftInteger
        Name = 'ID'
        ParamType = ptInput
      end>
    OnReconcileError = cdsMestreReconcileError
  end
  inherited dspMestre: TDataSetProvider
    DataSet = DM.QCadIndustriaMarca
  end
end
